home *** CD-ROM | disk | FTP | other *** search
- PROGRAM NAME: Atsay.PRG
-
- DESCRIPTION: Print spooling in dBASE III
-
- ISSUE: November, 1985
- PAGE: 13
-
- SOFTWARE VERSIONS: dBASE III, Developer's Release
-
- FUNCTION: This program provides a way of sending a customized
- report, generated with @...SAYs, to a text file for printing at a
- later date.
-
- FILES NEEDED: Atsay.PRG
-
- SETUP INSTRUCTIONS:
- To set up, first, place the Atsay program into your procedure
- file. Next, in the calling program SET ALTERNATE TO <filename>
- and initialize the following memory variables.
-
- max_row := numeric, maximum number of rows per page
- max_col := numeric, maximum number of columns per row
- prev_row := 0
- prev_col := 0
-
- Then, replace each @...SAY and @...GET that you want to capture
- to the alternate file in your report program with a "DO Atsay
- WITH..." statement. For example,
-
- @ 5,6 SAY Name PICTURE "!!!!!"
-
- becomes:
-
- DO Atsay WITH 5, 6, Name, "!!!!!"
-
- and
-
- @ 5,6 SAY "Name" GET Name
-
- becomes:
-
- DO Atsay WITH 5,6,"Name",""
- or DO Atsay WITH prev_row,prev_col+1,Name,""
-
- Your calling program should look something like the following:
-
- * ---In the report procedure.
- SET ALTERNATE TO <filename>
- SET ALTERNATE ON
- STORE 0 TO prev_row, prev_col
- max_row = 23
- max_col = 79
- * ---Report algorithm goes here.
- * ---Syntax used in place of the @...SAY command:
- * ---DO Atsay WITH <row>, <column>, <expression>, <picture>
- *
- CLOSE ALTERNATE
- RETURN
- * End of report procedure.
-
- The text file containing the spooled report can be printed by
- using the PC/MS-DOS PRINT.COM, COPY <filename> PRN, TYPE
- <filename> > LPT1, or from other word processing software.
-